;	�������� �������� ��������� ������ �������� 
;	-------------------------------------------
;
	org	100h				;�������� ������������ ������ �������� ��
	jmp	Begin
Sector	times	512	db	10h
	times	512	db	11h
	times	512	db	12h
Begin:
	mov	si,Msg				;SI <- ����� ���������
	call	Outstring			;����� ��������� �� ������
	jmp	$				;����������� ����
Msg	db	'Senkevich Aleksandr', 0
;
;	����� �� ����� ������, ��������������� �����
;	--------------------------------------------
; ����: SI - �����-�������� ������� ����� ������
;
Outstring:
	push	ax
	push	bx
	push	si
.Next:	lodsb					;AL <- si-� ����, SI <- SI+1
	or	al,al				;(AL)=0?
	jz	.Exit				;���� ��
	mov	ah,0eh				;������� ������ �������
	xor	bh,bh				;������� �������������
	int	10h				;����� �������
	jmp	.Next				;�� ��������� ��������
.Exit:	pop	si
	pop	bx
	pop	ax
	ret					;�������
